home *** CD-ROM | disk | FTP | other *** search
/ C/C++ Users Group Library 1996 July / C-C++ Users Group Library July 1996.iso / vol_300 / 310_02 / standard < prev    next >
Text File  |  1990-04-18  |  56KB  |  2,080 lines
  1. temp <- <primitive 110 10 >
  2. <primitive 112 temp 1        " view " \
  3.     #( #[ 32 250 1 156 242 245] \
  4.     #(  ) ) >
  5.  
  6. <primitive 112 temp 2        " variables " \
  7.     #( #[ 32 250 1 158 243 245] \
  8.     #(  ) ) >
  9.  
  10. <primitive 112 temp 3        " superClass " \
  11.     #( #[ 32 250 1 151 243 245] \
  12.     #(  ) ) >
  13.  
  14. <primitive 112 temp 4        " respondsTo: " \
  15.     #( #[ 32 114 34 162 247 18 34 33 250 2 155 247 2 91 243 \
  16.  242 34 10 46 241 114 242 249 22 242 92 243 245] \
  17.     #(  ) ) >
  18.  
  19. <primitive 112 temp 5        " respondsTo " \
  20.     #( #[ 32 250 1 154 242 245] \
  21.     #(  ) ) >
  22.  
  23. <primitive 112 temp 6        " printString " \
  24.     #( #[ 32 250 1 152 243 245] \
  25.     #(  ) ) >
  26.  
  27. <primitive 112 temp 7        " new: " \
  28.     #( #[ 32 250 1 151 114 34 250 1 3 247 4 34 160 241 115 \
  29.  242 32 35 250 2 153 115 32 48 250 2 155 247 5 35 \
  30.  33 176 241 115 242 35 243 245] \
  31.     #( #new:  ) ) >
  32.  
  33. <primitive 112 temp 8        " new " \
  34.     #( #[ 32 250 1 151 113 33 250 1 3 247 4 33 160 241 114 \
  35.  242 32 34 250 2 153 114 32 48 250 2 155 247 4 34 \
  36.  160 241 114 242 34 243 245] \
  37.     #( #new  ) ) >
  38.  
  39. <primitive 112 temp 9        " list " \
  40.     #( #[ 32 250 1 157 242 245] \
  41.     #(  ) ) >
  42.  
  43. <primitive 112 temp 10        " edit " \
  44.     #( #[ 32 250 1 150 242 245] \
  45.     #(  ) ) >
  46.  
  47. <primitive 98 #Class \
  48.     <primitive 97 #Class #Object #\lst\prelude\class.st \
  49.     #(  ) \
  50.     #( #view #variables #superClass #respondsTo: #respondsTo #printString #new: #new #list #edit  ) \
  51.     temp 4 4 > >
  52.  
  53. temp <- <primitive 110 21 >
  54. <primitive 112 temp 1        " shallowCopy " \
  55.     #( #[ 32 250 1 4 113 33 80 199 247 4 32 243 248 26 242 \
  56.  32 164 160 114 81 33 178 225 3 11 34 35 32 35 250 \
  57.  2 111 250 3 112 243 179 242 34 243 242 245] \
  58.     #(  ) ) >
  59.  
  60. <primitive 112 temp 2        " respondsTo: " \
  61.     #( #[ 32 164 33 11 41 243 245] \
  62.     #(  ) ) >
  63.  
  64. <primitive 112 temp 3        " printString " \
  65.     #( #[ 32 10 16 243 245] \
  66.     #(  ) ) >
  67.  
  68. <primitive 112 temp 4        " print " \
  69.     #( #[ 32 169 250 1 121 242 245] \
  70.     #(  ) ) >
  71.  
  72. <primitive 112 temp 5        " notNil " \
  73.     #( #[ 91 243 245] \
  74.     #(  ) ) >
  75.  
  76. <primitive 112 temp 6        " next " \
  77.     #( #[ 93 243 245] \
  78.     #(  ) ) >
  79.  
  80. <primitive 112 temp 7        " isNil " \
  81.     #( #[ 92 243 245] \
  82.     #(  ) ) >
  83.  
  84. <primitive 112 temp 8        " isMemberOf: " \
  85.     #( #[ 33 32 164 181 243 245] \
  86.     #(  ) ) >
  87.  
  88. <primitive 112 temp 9        " isKindOf: " \
  89.     #( #[ 32 164 114 34 162 247 16 34 33 181 247 2 91 243 242 \
  90.  34 10 46 241 114 242 249 20 242 92 243 245] \
  91.     #(  ) ) >
  92.  
  93. <primitive 112 temp 10        " first " \
  94.     #( #[ 32 243 245] \
  95.     #(  ) ) >
  96.  
  97. <primitive 112 temp 11        " error: " \
  98.     #( #[ 33 32 250 2 122 242 245] \
  99.     #(  ) ) >
  100.  
  101. <primitive 112 temp 12        " do: " \
  102.     #( #[ 32 166 114 34 162 247 11 33 34 180 242 32 167 241 114 \
  103.  242 249 15 243 245] \
  104.     #(  ) ) >
  105.  
  106. <primitive 112 temp 13        " deepCopy " \
  107.     #( #[ 32 250 1 4 113 33 80 199 247 4 32 243 248 28 242 \
  108.  32 164 160 114 81 33 178 225 3 13 34 35 32 35 250 \
  109.  2 111 10 20 250 3 112 243 179 242 34 243 242 245] \
  110.     #(  ) ) >
  111.  
  112. <primitive 112 temp 14        " copy " \
  113.     #( #[ 32 10 42 243 245] \
  114.     #(  ) ) >
  115.  
  116. <primitive 112 temp 15        " class " \
  117.     #( #[ 32 250 1 1 243 245] \
  118.     #(  ) ) >
  119.  
  120. <primitive 112 temp 16        " asSymbol " \
  121.     #( #[ 32 10 16 10 17 243 245] \
  122.     #(  ) ) >
  123.  
  124. <primitive 112 temp 17        " asString " \
  125.     #( #[ 32 164 169 243 245] \
  126.     #(  ) ) >
  127.  
  128. <primitive 112 temp 18        " ~= " \
  129.     #( #[ 32 33 201 172 243 245] \
  130.     #(  ) ) >
  131.  
  132. <primitive 112 temp 19        " = " \
  133.     #( #[ 32 33 181 243 245] \
  134.     #(  ) ) >
  135.  
  136. <primitive 112 temp 20        " ~~ " \
  137.     #( #[ 32 33 181 172 243 245] \
  138.     #(  ) ) >
  139.  
  140. <primitive 112 temp 21        " == " \
  141.     #( #[ 32 33 250 2 7 243 245] \
  142.     #(  ) ) >
  143.  
  144. <primitive 98 #Object \
  145.     <primitive 97 #Object #Object #\lst\prelude\object.st \
  146.     #(  ) \
  147.     #( #shallowCopy #respondsTo: #printString #print #notNil #next #isNil #isMemberOf: #isKindOf: #first #error: #do: #deepCopy #copy #class #asSymbol #asString #~= #= #~~ #==  ) \
  148.     temp 4 7 > >
  149.  
  150. temp <- <primitive 110 22 >
  151. <primitive 112 temp 1        " sameAs: " \
  152.     #( #[ 32 33 250 2 6 247 7 32 33 250 2 102 248 4 242 \
  153.  32 10 19 243 245] \
  154.     #(  ) ) >
  155.  
  156. <primitive 112 temp 2        " size " \
  157.     #( #[ 32 250 1 100 243 245] \
  158.     #(  ) ) >
  159.  
  160. <primitive 112 temp 3        " printNoReturn " \
  161.     #( #[ 32 250 1 120 242 245] \
  162.     #(  ) ) >
  163.  
  164. <primitive 112 temp 4        " print " \
  165.     #( #[ 32 250 1 121 242 245] \
  166.     #(  ) ) >
  167.  
  168. <primitive 112 temp 5        " printString " \
  169.     #( #[ 32 250 1 109 243 245] \
  170.     #(  ) ) >
  171.  
  172. <primitive 112 temp 6        " printAt: " \
  173.     #( #[ 32 33 10 49 33 10 50 250 3 126 242 245] \
  174.     #(  ) ) >
  175.  
  176. <primitive 112 temp 7        " new: " \
  177.     #( #[ 33 250 1 115 243 245] \
  178.     #(  ) ) >
  179.  
  180. <primitive 112 temp 8        " deepCopy " \
  181.     #( #[ 32 250 1 107 243 245] \
  182.     #(  ) ) >
  183.  
  184. <primitive 112 temp 9        " copyFrom:length: " \
  185.     #( #[ 32 33 34 250 3 106 243 245] \
  186.     #(  ) ) >
  187.  
  188. <primitive 112 temp 10        " copyFrom:to: " \
  189.     #( #[ 32 33 34 33 193 81 192 250 3 106 243 245] \
  190.     #(  ) ) >
  191.  
  192. <primitive 112 temp 11        " compareError " \
  193.     #( #[ 32 48 188 243 245] \
  194.     #( 'strings can only be compared to strings'  ) ) >
  195.  
  196. <primitive 112 temp 12        " at:put: " \
  197.     #( #[ 32 33 34 250 3 105 242 245] \
  198.     #(  ) ) >
  199.  
  200. <primitive 112 temp 13        " at: " \
  201.     #( #[ 32 33 250 2 104 243 245] \
  202.     #(  ) ) >
  203.  
  204. <primitive 112 temp 14        " asSymbol " \
  205.     #( #[ 32 250 1 108 243 245] \
  206.     #(  ) ) >
  207.  
  208. <primitive 112 temp 15        " asFloat " \
  209.     #( #[ 32 250 1 165 243 245] \
  210.     #(  ) ) >
  211.  
  212. <primitive 112 temp 16        " asInteger " \
  213.     #( #[ 32 250 1 164 243 245] \
  214.     #(  ) ) >
  215.  
  216. <primitive 112 temp 17        " > " \
  217.     #( #[ 32 33 250 2 6 247 9 32 33 250 2 101 80 204 248 \
  218.  4 242 32 10 19 243 245] \
  219.     #(  ) ) >
  220.  
  221. <primitive 112 temp 18        " >= " \
  222.     #( #[ 32 33 250 2 6 247 9 32 33 250 2 101 80 203 248 \
  223.  4 242 32 10 19 243 245] \
  224.     #(  ) ) >
  225.  
  226. <primitive 112 temp 19        " <= " \
  227.     #( #[ 32 33 250 2 6 247 9 32 33 250 2 101 80 200 248 \
  228.  4 242 32 10 19 243 245] \
  229.     #(  ) ) >
  230.  
  231. <primitive 112 temp 20        " < " \
  232.     #( #[ 32 33 250 2 6 247 9 32 33 250 2 101 80 199 248 \
  233.  4 242 32 10 19 243 245] \
  234.     #(  ) ) >
  235.  
  236. <primitive 112 temp 21        " = " \
  237.     #( #[ 32 33 250 2 6 247 9 32 33 250 2 101 80 201 248 \
  238.  4 242 32 10 19 243 245] \
  239.     #(  ) ) >
  240.  
  241. <primitive 112 temp 22        " , " \
  242.     #( #[ 32 32 33 250 2 6 247 3 33 248 3 242 33 169 250 \
  243.  2 103 243 245] \
  244.     #(  ) ) >
  245.  
  246. <primitive 98 #String \
  247.     <primitive 97 #String #ArrayedCollection #\lst\prelude\string.st \
  248.     #(  ) \
  249.     #( #sameAs: #size #printNoReturn #print #printString #printAt: #new: #deepCopy #copyFrom:length: #copyFrom:to: #compareError #at:put: #at: #asSymbol #asFloat #asInteger #> #>= #<= #< #= #,  ) \
  250.     temp 3 5 > >
  251.  
  252. temp <- <primitive 110 1 >
  253. <primitive 112 temp 1        " nothing " \
  254.     #( #[ 81 242 245] \
  255.     #(  ) ) >
  256.  
  257. <primitive 98 #ArrayedCollection \
  258.     <primitive 97 #ArrayedCollection #Object #\lst\prelude\larray.st \
  259.     #(  ) \
  260.     #( #nothing  ) \
  261.     temp 1 2 > >
  262.  
  263. temp <- <primitive 110 3 >
  264. <primitive 112 temp 1        " printString " \
  265.     #( #[ 48 243 245] \
  266.     #( 'nil'  ) ) >
  267.  
  268. <primitive 112 temp 2        " notNil " \
  269.     #( #[ 92 243 245] \
  270.     #(  ) ) >
  271.  
  272. <primitive 112 temp 3        " isNil " \
  273.     #( #[ 91 243 245] \
  274.     #(  ) ) >
  275.  
  276. <primitive 98 #UndefinedObject \
  277.     <primitive 97 #UndefinedObject #Object #\lst\prelude\nil.st \
  278.     #(  ) \
  279.     #( #printString #notNil #isNil  ) \
  280.     temp 1 2 > >
  281.  
  282. temp <- <primitive 110 6 >
  283. <primitive 112 temp 1        " size " \
  284.     #( #[ 32 250 1 4 243 245] \
  285.     #(  ) ) >
  286.  
  287. <primitive 112 temp 2        " printString " \
  288.     #( #[ 48 113 32 250 1 4 114 34 80 204 247 21 32 34 250 \
  289.  2 111 169 49 11 17 33 11 17 113 34 81 193 241 114 \
  290.  242 249 26 242 50 33 11 17 243 245] \
  291.     #( ')' ' ' '#( '  ) ) >
  292.  
  293. <primitive 112 temp 3        " grow: " \
  294.     #( #[ 32 33 250 2 113 243 245] \
  295.     #(  ) ) >
  296.  
  297. <primitive 112 temp 4        " at:put: " \
  298.     #( #[ 33 81 199 251 6 33 32 250 1 4 204 247 6 32 48 \
  299.  188 242 93 243 242 32 33 34 250 3 112 242 34 243 245 \
  300. ] \
  301.     #( 'index error'  ) ) >
  302.  
  303. <primitive 112 temp 5        " at: " \
  304.     #( #[ 33 81 199 251 6 33 32 250 1 4 204 247 6 32 48 \
  305.  188 242 93 243 242 32 33 250 2 111 243 245] \
  306.     #( 'index error'  ) ) >
  307.  
  308. <primitive 112 temp 6        " new: " \
  309.     #( #[ 33 250 1 114 243 245] \
  310.     #(  ) ) >
  311.  
  312. <primitive 98 #Array \
  313.     <primitive 97 #Array #ArrayedCollection #\lst\prelude\array.st \
  314.     #(  ) \
  315.     #( #size #printString #grow: #at:put: #at: #new:  ) \
  316.     temp 3 4 > >
  317.  
  318. temp <- <primitive 110 6 >
  319. <